home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib14.dsk / FLE.EXEC CREATOR.bas < prev    next >
BASIC Source File  |  2023-02-26  |  789b  |  24 lines
  1. 100  REM  *******************************
  2. 101  REM  *    FAST LOAD ENHANCEMENT    *
  3. 102  REM  *  EXEC INSTALL FILE CREATOR  *
  4. 103  REM  *         BY TOM BURT         *
  5. 104  REM  *    COPYRIGHT (C) 1983 BY    *
  6. 105  REM  *       MICRO-SPARC INC.      *
  7. 106  REM  *     LINCOLN, MA. 01773      *
  8. 107  REM  *    ALL RIGHTS RESERVED      *
  9. 108  REM  *******************************
  10. 110 D$ =  CHR$(4)
  11. 120  REM  OPEN THE TEXT FILE
  12. 130  PRINT D$;"OPEN FLE.EXEC"
  13. 140  PRINT D$;"WRITE FLE.EXEC"
  14. 150  REM  LOAD THE FLE SUBROUTINE
  15. 160  PRINT "BLOAD FLE.OBJ,A$BEAF"
  16. 170  REM  CHANGE LOAD/BLOAD TO CALL FLE
  17. 180  PRINT "CALL -151"
  18. 190  PRINT "A40B:AF BE"
  19. 200  REM  DISABLE RWTS FORMAT (CLC,RTS)
  20. 210  PRINT "BE0D:18 60"
  21. 220  REM  RETURN TO BASIC
  22. 230  PRINT "3D0G"
  23. 240  PRINT D$;"CLOSE FLE.EXEC"
  24. 250  END